1 REM *** D E F I N I T I O N *** 2 DIMA$(500,2):DIMA(500):POKE53281,7:S=54272:POKE53280,10:CO=55296-1024:Q=1 15 :POKES+4,21:GOSUB3000 16 PRINT"[147][144]"TAB(9)" D E F I N I T I O N [146]" 19 PRINT" YOUR COMMODORE 64 WILL HAVE A SELECTION" 20 PRINT" OF"Q" DIFFERENT DEFINITIONS" 25 READA$(Q,1),A$(Q,2):IFA$(Q,1)="EOF"THENQ=Q-1:GOTO50 30 Q=Q+1:IFQ>500THENQ=500:GOTO50 40 N=RND(1):GOTO20 50 PRINT"[147][144]"TAB(9)" D E F I N I T I O N [146]" 51 PRINT" YOUR COMMODORE 64 WILL HAVE A SELECTION OF"Q" DIFFERENT DEFINITIONS" 55 FORT=1TO500:A(T)=1:NEXT 60 PRINT"1.PLAYERS NAME":INPUTP1$:PRINT"2.PLAYERS NAME":INPUTP2$ 61 PRINT"HOW MANY QUESTIONS WOULD YOU LIKE":INPUTK% 62 IFLEN(P1$)>8ORLEN(P2$)>8THEN65 63 IFK%>QTHENPRINT" NUMBER CAN'T BE LARGER THAN";Q:FORT=1TO3500:NEXT:GOTO50 64 GOTO70 65 PRINT"NAME CAN NOT BE MORE THAN 8 LETTERS LONG":FORT=1TO3000:NEXT:GOTO50 70 PRINT"[147][144]"TAB(9)" D E F I N I T I O N [146]" 100 FORT=1TO26:POKE1949+T,T:POKE1949+T+CO,0:NEXT 105 N=INT(Q*RND(1)+1):CT=0:K=0:X=1:IFA(N)<>1THEN105 106 A(N)=2:QK=QK+1:IFQK=QTHENPRINT"YOU USED ALL DEFINITIONS":END 107 GOSUB6010:IFT<>1THEN120 110 PRINT"[149]  HINT [146][144] ";A$(N,1) 120 L=LEN(A$(N,2)) 130 PRINT"[158]";TAB((40-L)/2)A$(N,2) 140 P=1784:FORT=0TO40:IFPEEK(P+T)<>32THENPOKEP+T+40,45:POKEP+CO+40+T,0:CT=CT+1 150 NEXT 199 J=INT((1+1)*RND(1)):IFJ=1THEN201 200 U=0:J=J+1:J$=P1$:GOTO204 201 U=0:J=J+1:J$=P2$ 204 L=LEN(J$):PRINT"[144]";TAB((40-L-19)/2)J$;" GIVE AWAY A LETTER":Z=1 205 TI$="000000" 208 PRINT"[149]";TAB(16)"TIME ";RIGHT$(TI$,2) 209 IFINT(TI/60)=>10THENONJGOSUB600,601:GOTO247 210 GETG$:IFG$=""THEN208 212 IFU=1THENPRINT"[144]"TAB(14)"I TAKE A *";G$;"*":Z=2:GOTO220 215 PRINT"[144]"TAB(12)"I GIVE AWAY A *";G$;"*" 220 Y=0:G=ASC(G$)-64:P=1949:FORT=1TO26:IFPEEK(P+T)=GTHENPOKEP+T,32:Y=Y+1:GOSUB650 222 NEXT:IFY=0THENPRINTTAB(6)"SORRY *";G$;"* IS ALLREADY TAKEN":GOSUB579:ONZGOTO204,250 230 C=0:P=1784:FORT=0TO40:IFPEEK(P+T)=GTHENGOSUB550 240 NEXT:IFC<>0ANDU=1THENGOTO260 241 IFU=0ANDC=OTHENPRINTTAB(10)"RIGHT THERE IS NO *";G$;"*":GOTO250 242 IFU=1ANDC=0THENPRINTTAB(10)"SORRY THERE IS NO *";G$;"*":GOTO247 243 IFU=0ANDC<>0THEN:PRINTTAB(11)"SORRY WE HAVE";C;"*";G$;"*":GOSUB579:IFK=CTTHEN360 244 IFJ=1THENJ$=P2$:J=3:GOTO270 245 J$=P1$:J=3:GOTO270 247 GOSUB580 248 IFJ=2THENJ=0:GOTO200 249 GOTO201 250 GOSUB580:PRINT"[144]"TAB((40-L-14)/2)J$" TAKE A LETTER ":U=1:GOTO205 260 PRINTTAB(12)"YES WE HAVE";C;"*";G$;"*":GOSUB579:K=K+C:IFK=CTTHEN360 270 PRINT"[144]";TAB((40-L-28)/2)J$" DO YOU WANT TO GUESS ? (Y,N)" 275 TI$="000000" 280 PRINT"[149]";TAB(16)"TIME ";RIGHT$(TI$,2) 290 IFINT(TI/60)=>10THENONJGOSUB600,601,605:ONXGOTO247,350 300 GETM$:IFM$<>"Y"ANDM$<>"N"THEN280 305 IFM$="N"THENONXGOTO247,350 310 GOSUB585: PRINT"[144]":INPUTQ$:IFLEN(Q$)>37THEN355 315 PRINT"[149]";TAB(16)"TIME ";RIGHT$(TI$,2) 316 IFINT(TI/60)>=45THENONJGOSUB600,601,605:ONXGOTO247,350 318 IFQ$<>A$(N,2)THENPRINT""TAB(10)"[144]SORRY YOU ARE WRONG":ONXGOTO247,350 320 PRINT"[144]"TAB((40-L-11)/2)"YOU GOT IT ";J$:GOTO360 350 GOSUB580:X=1:IFJ$=P1$THENJ=0:GOTO200 352 X=1:J=1:GOTO201 355 PRINT" ANSWER CAN NOT BE MORE THAN 37 LETTERS" 356 PRINT"YOUR OPPONENT WILL GET 50 POINTS BE MORECAREFULL NEXT TIME" 357 IFJ$=P1$THENJ2%=J2%+50:FORT=1TO4500:NEXT:GOTO70 358 J1%=J1%+50:FORT=1TO3500:NEXT:GOTO70 360 FORT=1TO3500:NEXT:GOSUB2000:IFK%=0THEN365 361 GOTO70 365 FORT=1TO4000:NEXT:PRINT"[144]"TAB(14)" GAME OVER [146]" 370 PRINT"[144] PRESS *C* TO CONTINUE OR *S* TO STOP" 380 GETA$:IFA$<>"C"ANDA$<>"S"THEN380 390 IFA$="S"THEN400 392 PRINT"[147][144]"TAB(9)" D E F I N I T I O N [146]" 393 PRINT" HOW MANY QUESTIONS WOULD YOU LIKE":INPUTK%:J1%=0:J2%=0:GOTO70 400 END 550 C=C+1:FORTJ=0TO24:POKES+TJ,0:NEXT:POKES+1,130:POKES+5,9:POKES+15,30:POKES+24,15:POKES+4,21 560 POKEP+CO+T,0:FORTJ=1TO1200:NEXT:POKES+4,20:RETURN 579 FOR T=1TO3000:NEXT:IFU=0ANDC<>0THENK=K+C:X=X+1:IFX>2THENX=2 580 P=1064:FORT=0TO3*40:POKEP+T,32:NEXT 581 P=1304:FORT=0TO8*40:POKEP+T,32:NEXT:POKE198,0:RETURN 585 P=1504:FORT=0TO7*40:POKEP+T,32:NEXT:POKE198,0:RETURN 600 PRINTTAB((40-LEN(P1$)-LEN(P2$)-21)/2)"TIME EXPIRED "P1$" "P2$"'S TURN[144]":GOTO610 601 PRINTTAB((40-LEN(P1$)-LEN(P2$)-21)/2)"TIME EXPIRED "P2$" "P1$"'S TURN[144]":GOTO610 605 PRINTTAB(14)"TIME EXPIRED[144]" 610 FORTJ=1TO24:POKES+TJ,0:NEXT:POKES+1,20:POKES+5,9:POKES+6,9:POKES+24,15:POKES+4,17 615 FORTJ=1TO1200:NEXT:POKES+4,16:FORTJ=1TO2000:NEXT 620 RETURN 650 FORTJ=1TO24:POKES+TJ,0:NEXT:POKES+1,180:POKES+5,9:POKES+15,30:POKES+24,15:POKES+4,21 655 FORTJ=1TO1000:NEXT:POKES+4,20:RETURN 800 PRINT"[147][144]"TAB(9)" D E F I N I T I O N [146]" 810 PRINTTAB(5)" B O N U S Q U E S T I O N [145]" 830 FORT=1TO26:POKE1949+T,T:POKE1949+T+CO,0:NEXT:SC=260 840 N=INT(Q*RND(1)+1):IFA(N)<>1THEN840 850 A(N)=2:QK=QK+1:IFQK=QTHEN360 855 GOSUB6010:IFT<>1THEN870 860 PRINT"[149]  HINT [146][144] ";A$(N,1) 870 L=LEN(A$(N,2)) 890 PRINT"[158]";TAB((40-L)/2)A$(N,2):CT=0 900 P=1784:FORT=0TO40:IFPEEK(P+T)<>32THENPOKEP+T+40,45:POKEP+CO+40+T,0:CT=CT+1 910 NEXT:POKE198,0:AT=1:C=0 915 PRINT""TAB(25)" ":SC=SC-10:PRINT"[144]"TAB(12)"BONUS POINTS";SC 920 GETX$:IFX$=CHR$(133)THEN950 930 FORTJ=1TO24:POKES+TJ,0:NEXT:POKES+1,180:POKES+5,9:POKES+15,30:POKES+24,15:POKES+4,21 935 POKE1949+AT,32:FORTJ=1TO1000:NEXT:POKES+4,20 940 P=1784:FORT=0TO40:IFPEEK(P+T)=ATTHENGOSUB550 945 NEXT:AT=AT+1:IFAT>26THENRETURN 946 IFC=CTTHENSC=0:RETURN 949 GOTO915 950 PRINT"[144]":INPUTQ$:IFLEN(Q$)>37THENSC=0:RETURN 960 IFQ$<>A$(N,2)THENPRINT""TAB(10)"[144]SORRY YOU ARE WRONG":GOTO965 962 GOTO970 965 GOSUB581:GOTO915 970 PRINT"[144]"TAB((40-LEN(J$)-11)/2)"YOU GOT IT ";J$:RETURN 1000 DATAA CERTAIN UNDERGARMENT FOR A CERTAIN ANIMAL,Z BRA 1001 DATAWHAT CANAPES ARE TO NUDE BATHERS IN A STREAM,BROOK SHIELDS 1002 DATATHE MOUNTAIN WORE ONE,AN ICE CAP 1003 DATAWHY HOUDINIE WAS SUCCESSFUL,HE LEARNED THE ROPES 1004 DATAOVER EXUBERANCE IN THE HEN HOUSE,FOWL PLAY 1005 DATAWHAT THE DECISION TO LOG IN THE FOREST RESERVE RAISED,A HEW AND CRY 1006 DATAANGRY AT BEING DISINHERITED IN APRIL,MAD AS A MARCH HEIR 1007 DATARAINING DIMES NICKELS AND QUARTERS,A CHANGE IN THE WEATHER 1008 DATAWHAT PEOPLE WHO WEAR SHORT SLEEVES CAN'T DO,MAKE OFF THE CUFF REMARKS 1009 DATATODDLERS IN SWIMMING POOLS,LITTLE DIPPERS 1010 DATAWHAT YOU GET FROM EATING TOO MUCH FROZEN FOOD,FROST BITE 1011 DATAHUMPTY DUMPTY'S FALL,AN EGG ROLL 1012 DATAHOW THE SERGEANT STOPPED THE UNINVITED GUESTS,COMPANY HALT 1013 DATABEING ATTACKED BY A CERTAIN GEOMETRIC FIGURE,A VICIOUS CIRCLE 1014 DATATHE JOB AFTER A DECEMBER SNOW STORM,JANUARY CLEARANCE 1015 DATAWHAT HAPPENED WHEN THE ELEPHANT LAID DOWN TO REST,THE BED SPREAD 1016 DATAA MOTHER WHO DOESN'T PLAY FAVORITES,LIKE FATHER LIKE SON 1017 DATAFRESH WATER DUCKS,UNSALTED QUACKERS 1018 DATAWHAT AN UNEMPLOYED CUSTOMS OFFICER IS,DUTY FREE 1019 DATAWHY HE BOUGHT SO MUCH LAND,IT WAS DIRT CHEAP 1020 DATAWHY MUSK IS USED AS A PURFUME BASE,IT MAKES GOOD SCENTS 1021 DATAWHAT THE SICK FORECASTER WAS,UNDER THE WEATHER 1022 DATABUYING THE HOME RIGHT AWAY,LOVE AT FIRST SITE 1023 DATAA CERTAIN CARD GAME OF THE HOOK AND LADDER COMPANAY,FIRE PLACE POKER 1024 DATAWHAT THE SCULPTOR HAD TO FACE,A MONUMENTAL TASK 1025 DATAWHAT CONCEITED METEOROLOGISTS ARE,WEATHER VAIN 1026 DATAFLIPPING PANCAKES FOR YOUR TEAMS BREAKFAST,BATTER UP 1027 DATAHOW TO PUNISH THE BARE FOOT BOY,BOOT HIM 1028 DATAA TOPSY TURVY DESSERT,AN UPSIDE DOWN CAKE 1029 DATAA CERTAIN DEBBY'S MINK STOLE,REYNOLDS WRAP 1030 DATAA LONG ROW OF KILNS,A FIRING SQUAD 1031 DATAHOW TO MEASURE PARTS OF THE OCEAN,YOU RULE THE WAVES 1032 DATAPICKING UP A CERTAIN UTENSIL,A FORK LIFT 1033 DATADO STICKS FLOAT,THEY WOOD 1034 DATASIMILARITY BETWEEN DESTINY AND DIET,BOTH SHAPE OUR ENDS 1035 DATAADAM BEFORE EVE,FIRST PERSON SINGULAR 1036 DATAWHAT A CERTAIN CAT WAS DOING ON A HOT DAY,JUST LION AROUND 1037 DATAWHAT THE RETIRED SALESMAN WAS,OUT OF COMMISSION 1038 DATAWHY ORVILLE AND WILBUR SIGNED THE FIRST AIRPLANE PATENT 1039 DATATHE PRICE WAS WRIGHT 1040 DATAPOURING LIQUID FROM A LARGE CONTAINER INTO A SMALLER ONE 1041 DATAWHAT FUNNEL THAT BE 1042 DATAA SKUNK RIDING ON THE BACK OF A CAR,A BUMPER STINKER 1044 DATAGIVING QUICK ANSWERS TO CERTAIN ARITHMETIC PROBLEMS,ADD LIBBING 1045 DATAENTERING A GLOVE IN A RACE,RUNNING THE GAUNTLET 1046 DATAWHAT YOUR MISSING PET PIG IS,A PORK YOU PINE 1047 DATAA SKINNY MOUSE,A NARROW SQUEAK 1048 DATAWHY THE FAMILY MOVED INTO THE GLUE FACTORY,TO STICK TOGETHER 1049 DATATHE PERSON WHO RUNS THE PRESS AT THE CLEANERS,AN IRON WORKER 1050 DATAWHAT THE SHORT FIGURE SKATER WANTED TO BE,TOLLER THAN CRANSTON 1051 DATAHEAVY ORIENTAL APPETIZER,ONE TON SOUP 1052 DATAA CERTAIN VEGETABLE LEADER,HEAD OF CABBAGE 1053 DATASITE FOR BARBECUE LOVERS,THE GRATE OUTDOORS 1054 DATAA PILLOW,HEADQUARTERS 1055 DATACHINESE COOKING IN THE FOREST,WOK IN THE WOODS 1056 DATAWHAT ANIMAL SHOULD NEVER PLAY CARDS,A CHEETAH 1057 DATAHOW FAR IT IS TO THE ATHLETIC FIELD,A HOP A SKIP AND A JUMP 1058 DATAA SWING AROUND IN FASHION,TURN STYLE 1059 DATAA NURSE NAMED KATHRYN,A FIRST AID KIT 1060 DATADRY DOCK FOR A CERTAIN NAVAL CRAFT,SUB TRACTION 1061 DATARECRUITING SLOGAN FOR THE NAVY,SEAS THE OPPORTUNITY 1062 DATAWHAT THE DRUNK PREHISTORIC WOMAN WAS,STONED AGAIN 1063 DATAHOW THE CITY KEPT THE AIR CLEAN,WITH SKYSCRAPERS 1064 DATAA STARCHY PIECE OF CLOTH,A FLOUR PATCH 1065 DATAWHY HE WAS HAPPY AFTER BUYING AN ACRE IN THE COUNTRY,IT MEANT A LOT TO HIM 1066 DATAA FISHY RELATIVE,A SOLE SISTER 1067 DATAWHAT JIM PERRY SAID TO THE NEWLY CROWNED MISS CANADA,G U R A Q T 1068 DATAFROST BITTEN,COLD SORE 1069 DATATHE LOCKSMITH JOB MARKET,THINGS ARE OPENING UP 1070 DATAFOOD SERVED ON AN AIRPLANE,CRAFT DINNER 1071 DATAARTISIAN WATER,WELL BROUGHT UP 1072 DATAWHAT THE RECOOPERATING OPTITIAN WAS,LOOKING BETTER 1073 DATABADMINTON PLAYERS DELIGHT,A SUDDEN WINDFALL 1074 DATAGIVING AWAY CANDY,SWEET CHARITY 1075 DATASPYING SOVIET INSECT,CAGEY BEE 1076 DATATHE FREELOADERS FAVORITE CAKE,SPONGE 1077 DATAELIMINATING SALT FROM THE DIET,COURSE I CAN 1078 DATAWHAT SOCKS WITH MANY HOLES ARE,NOT WORTH A DARN 1079 DATAHOW TO GET RID OF ANTS,PUT YOUR FOOT DOWN 1080 DATAWHY THE MOONSHINER COULDN'T GO BACK TO WORK,HE WAS STILL SICK 1081 DATAWHAT THE FISHERMAN WAS CHARGED WITH,HARBOURING CRIMINALS 1082 DATASTORY ABOUT AN AMAZON WARRIOR,SOME TALL TALE 1083 DATAWHAT A FAT FOOL WEIGHS,A SIMPLE TON 1084 DATATHE LOCHS MONSTER SMILED,HAPPY NESS 1085 DATAHOW THE MOTHER SUMMONED HER TWINS,COME HERE ON THE DOUBLE 1086 DATAA FORMER U S PRESIDENT'S CURSE,HOOVER DAM 1087 DATAWHAT A TIRED BABY WOULD BE LOOKING FOR,A PICK ME UP 1088 DATAWHY THE CATTLE WERE SAD,THEY ATE BLUE GRASS 1089 DATAWHY ARCHERY ISN'T THE PERFECT SPORT,IT HAS DRAWBACKS 1090 DATAWHAT A SHOE STORE ROBBER IS,AN ARCH CRIMINAL 1091 DATASPRING CLEANING A CERTAIN COUNTRY,AIR CANADA 1092 DATAFLYING TO OTTAWA TO SEE THE PRIME MINISTER,C P AIR 1093 DATAFORTUNE TELLERS LOLLIPOP,SEER SUCKER 1094 DATAHIT THE ROAST OF MUTTON,GIVE IT A LAMB BASTING 1095 DATAWHAT THE GRAND CANYON IS,JUST GORGES 1096 DATAREGULATION OF A DIGIT,RULE OF THUMB 1097 DATAFUNNY MAN RUNS AWAY,COMICS TRIP 1098 DATAWHAT THE TIGHT ROPE USED TO KEEP SLIM AND TRIM,A BALANCED DIET 1099 DATASECRETLY RETURNING A STOLEN COIN,QUARTER BACK SNEAK 1100 DATASHE HAD A SUPREME COURT FIGURE,NO APPEAL 1101 DATAA HUNTING HEADGEAR,A STALKING CAP 1102 DATAALL DAY MAKING STRAWBERRY PRESERVES,HAVING A JAM SESSION 1103 DATAMINISTERS GOLF APPARATUS,D D TEE 1104 DATAWHAT TEMPERAMENTAL VOLCANOES DO,VENT THEIR ANGER 1105 DATASMOKING WHILE PLAYING IN THE BAND,PIPE AND DRUMS 1106 DATAWHAT A DOGS TONGUE IS,THE SEAT OF HIS PANTS 1107 DATAWHAT THE CENSUS TAKERS SAID TO THE LADY WITH CHILDREN AGED 1 3 5 7 9 1108 DATAHOW VERY ODD 1109 DATAHOW THE LITTLE BOY DESCRIBED HIS SISTER,MY NEXT OF SKIN 1110 DATANAPOLEON'S NATIONALITY OF BIRTH,COURSE I CAN 1111 DATALAS VEGAS BARBER SHOP,SCISSORS PALACE 1112 DATAWRITING WITH A DULL PENCIL,A POINTLESS ENDEAVOUR 1113 DATATHE CALAMITY OF THE 3 EGGS,TWO BAD 1114 DATAA FEMALE KOREAN HORSE,A FILLY OF SEOUL 1115 DATAWHAT BARBERING IS TO A PROFFESSIONAL,HIS MANE JOB 1116 DATAWHY 2 STRANGERS WENT DUCK HUNTING,THEY HAD A BLIND DATE 1117 DATANOT WEARING THEIR MASKS TO BAD,BARE FACED LIARS 1118 DATAGOLD DIGGER,A HUMAN GIMMEE PIG 1119 DATAHOW THE COCKNEY WENT TO HIS WEDDING,E LOPED 1120 DATABABY TWINS,TWO CLOSE FOR COMFORT 1121 DATAGRAFITTI ARTIST,WALL NUT 1122 DATAWHAT KATHLEEN'S MOM SAID WHEN HER DAUGHTER TOLD HER SHE WAS ELOPING 1123 DATAOH KAY 1124 DATATWO CERTAIN TALL MEN,A PAIR OF LONG JOHNS 1125 DATAWHO THE TEACHER KEPT HIS EYE ON,A CERTAIN PUPIL 1126 DATAWHAT THE BOWLING ALLEY WAS ON CHILDREN'S DAY,SAFETY PINS 1127 DATAWHAT A THIRSTY RACING DOG HAS TO DO,WIN THE LAST LAP 1128 DATAA POOR CRAZY POET,NO RHYME NOR REASON 1129 DATAMILD PUNISHMENT,LIGHT SWITCH 1130 DATAA MERMAID'S MATE,A MUSSEL MAN 1131 DATAWHAT DUELISTS HAVE,SWORDED PASTS 1132 DATAWHAT THE HAIRDRESSER IN THE UPSTAIRS SALON WANTS,A CUT ABOVE THE OTHERS 1133 DATAFOREMAN ON A HIGHWAY CREW,A ROADS CALLER 1134 DATAFIND LAND WITH YOUR BEST BUDDY,A FRIEND IN DEED 1135 DATAWHY THE FEMALE ELECTRICIAN NEVER HAS A PERM,SHE GETS SHOCK WAVES 1136 DATAWHERE SIR LANCELOT STUDIED,AT KNIGHT SCHOOL 1137 DATAHIGH CLASS PASTRY,UPPER CRUST 1138 DATABEST LOAF SHE EVER BAKED,THOROUGH BREAD 1139 DATAA REASON FOR JOINING A CLUB FOR TALL PEOPLE,IT IS GOOD TO BE LONG 1140 DATAHUMILIATED BY BIG PEOPLE,BE FELT SMALL 1141 DATARECIPE FOR A GOOD SPEECH,ADD SHORTENING 1142 DATAWHY THE LUMBERMAN WOULDN'T DANCE,HE HAD BORED FEET 1143 DATAWHAT THE EGYPTIAN MUMMY SAID TO THE BARTENDER,I JUST CAME IN TO UNWIND 1144 DATAA CERTAIN SPECIFIC SPICE,SAGE BRUSH 1145 DATAWHAT YOU NEED TO REMEDY A SPACE PROBLEM,A WAY OUT SOLUTION 1146 DATABEING RELATED TO THE BOSS,FIRE PROOF 1147 DATAWHAT A BABY MERMAID IS,A SEA URCHIN 1148 DATAPLAYING PING PONG IN A CHURCH STEEPLE,BATS IN THE BELLFRY 1149 DATAA VEGETARIAN HUNTER,A PEA SHOOTER 1150 DATAWHY THE FARMER THREW OUT CERTAIN CROPS,THEY WHERE DEAD BEETS 1151 DATAJEWELS THAT MIGHT BE FOUND IN THE OCEAN,AQUAMARINES 1152 DATAA CERTAIN MEXICAN WORKER,MANUEL LABOUR 1153 DATAWHAT GARDENERS DO FOR PROMOTION,PASS OUT LEAFLETS 1154 DATAWHAT A MAN WINS ON DEFINITION,A SIR PRIZE 1155 DATALAW AND ORDER IN THE FAR NORTH,POLE ICE MAN 1156 DATAA GAS STATION ATTENDANT,A WINDSHIELD WIPER 1157 DATAMANDITORY SEAT BELT LAW,RESTRAINING ORDER 1158 DATAHOW TO INCLUDE A HORSE IN YOUR INSURANCE POLICY,PUT A RIDER ON IT 1159 DATAWHERE THE FARMER FELL ASLEEP,IN YAWNDER FIELD 1160 DATAWHAT THE PLUMBER WANTED TO DO AT THE BEACH,TAKE THE PLUNGE 1161 DATAPERIOD FROM ABOUT 500 TO 1500 AD,MIDDLE AGE SPREAD 1162 DATAA CERTAIN BIRDS BAD HABIT,A CARDINAL SIN 1163 DATAWHAT IT COSTS TO HAVE A HOUSEKEEPER,A TIDY SUM 1164 DATAWHAT A CERTAIN FRUIT SAID TO ANOTHER,WE MAKE A FINE PEAR 1165 DATADORYS USED BY CAVIAR HUNTERS,ROE BOATS 1166 DATAPICNICS BY THE HIGHWAY,ROADSIDE DINERS 1167 DATAA SPACE AGESNACK,MICRO CHIPS 1168 DATAFOUNDRY WORKERS JOB,HE STEELS FOR A LIVING 1169 DATAHOW YOU TIME A MILKING MACHINE,WITH YOUR QUARTS WATCH 1170 DATAA PLANTATION MAID,A CROP DUSTER 1171 DATAMISSION CONTROLS JUNCTIONS,CALLING THE SHOTS 1172 DATAWHAT THE INUIT HUNG FROM THE IGLOO,A SNOW MOBILE 1173 DATAWHAT THE 2ND PLACE FINISHER IN THE HILL CLIMB WON,A RUNNER UP PRIZE 1174 DATATHE RESULT OF IRISH LAWN BOWLING,THE WEARING OF THE GREEN 1175 DATAHOW TO MAKE A COMPLETE PIG OF YOURSELF,GO WHOLE HOG 1176 DATASHE WORE UNDERWARE ON HER FEET,SLIP SHOD 1177 DATAWHY KIDS ARE STAYING IN SCHOOL,TO BE UP TO KNOW GOOD 1178 DATAVIOLIN BOWS,FIDDLE STICKS 1179 DATAWHAT A LAZY SAILOR IS,NOT WORTH HIS SALT 1180 DATAAVOIDING A SLOW TRAIN,GIVING A WIDE BERTH 1181 DATAPOLITICAL DANCE,THE CABINET SHUFFLE 1182 DATAA CERTAIN FRUIT IS GONE,THE BANANA SPLIT 1183 DATAWHY THE LIBRARY CRIED,BOOKS WERE IN TIERS 1184 DATAA VERY FAST CARPENTERS TOOL,A JET PLANE 1185 DATATHE DAIRYMANS ROUTE,THE MILKY WAY 1186 DATAWHAT POOR HUNTERS DO,SHOOT THE BREEZE 1187 DATAWHAT PLANTS DRINK,ROOT BEER 1188 DATAWHAT THE CONCEITED MUMMY WAS,WRAPPED UP IN HIMSELF 1189 DATAWHY J R WAS IN COURT,TO SUE ELLEN 1190 DATAHOW YOUR SHOES COULD GET YOU IN TROUBLE,BY A SLIP OF THE TONGUE 1191 DATASECRETARIAL,A TYPE OF WORK 1192 DATAWHAT THE MOST DELICIOUS VEGETABLE DOES,BEETS THEM ALL 1193 DATAAN ARGUMENTATIVE ROAD,A DIVIDED HIGHWAY 1194 DATAWHY USELESS THINGS DON'T SINK IN CHINA,BECAUSE THE JUNK FLOATS 1195 DATACARS THAT TAILGATE,BUMPER STICKERS 1196 DATAWHAT THE DARK HORSE WAS,A NIGHT MARE 1197 DATAWHERE A CAT STANDS TO GET HER PAY,IN A FEE LINE 1198 DATASPLINTS,THE TIES THAT BIND 1199 DATAWHAT THE CLOCKMAKER WAS PAID TO DO,TO MAKE FACES 1200 DATAWHAT A TOURIST MIGHT DO IN EGYPT,PIER AMID THE TOMBS 1201 DATAOLD FIRE HORSE,SPARK PLUG 1202 DATAWHAT A GUITARIST HAS,A GUT FEELING 1203 DATAWHAT THE CONSERVATIONIST TOLD THE GASOLINE COMPANY,GET THE LED OUT 1204 DATAA BABY CARRIAGE IN THE DESERT,A DUNE BUGGY 1205 DATASIGN IN AN AUTO REPAIR SHOP,ALWAYS ON OUR TOWS 1206 DATAWHERE JUDGES HOLD OUTDOOR TRIALS,IN THE COURT YARD 1207 DATAWHAT IS A 300 LB COWARD AFTER A BIG MEAL,A STUFFED CHICKEN 1208 DATAWHAT THE MOST ACCURATE SCALE WON,A MEASURING CUP 1209 DATAWHY PLUGTOBACCO WAS NEVER POPULAR IN CHINA,FEW MEN CHEW 1210 DATAFORMER BRITISH PRIME MINISTER DEPRESSION,CHURCHILL DOWN 1211 DATASAYING GOODBYE TO THE ARCHEOLOGICAL EXPEDITION,BONE VOYAGE 1212 DATAGARDEN REPAIR,VEGETABLE PATCH 1213 DATAWHAT THE LOST COW COULD WIN,THE NO BELL PRIZE 1214 DATAWHAT THE MAN WHO SWALLOWED PAINT TRIED TO DO,INTERIOR DECORATING 1215 DATAHOW TO GET A DEGREE WITHOUT STUDYING,BUY A GIFT CERTIFICATE 1216 DATAGROUCHY NORTHERN MONARCH,ALASKA KING CRAB 1217 DATATWO HARD WORKING PEOPLE,A PAIR OF PLIERS 1218 DATAWHY A CERTAIN FISH HAD TROUBLE LISTENING,HE WAS HARD OF HERRING 1219 DATAWHAT A GUIDE IN A MOVIE STUDIO IS,A LEADING MAN 1220 DATALOTS OF COMPLAINTS,A BEEF HEARD 1221 DATAA BOXING MATCH APPROXIMATELY,JUST A BOUT 1222 DATAWHAT A CERTAIN ANIMAL NEEDS TO SURVIVE,THE BEAR NECESSITIES 1223 DATAHENRY THE 8TH'S FAVORITE VEHICLE,TUDOR SEDAN 1224 DATAWHAT THE LIONESSES CUBS WERE,HER PRIDE AND JOY 1225 DATASATAN,THE DEVIL YOU SAY 1226 DATAADVISE TO A DIETER,NO THYSELF 1227 DATAWHAT A BAKER RECOMMENDS FOR A GIFT,SAY IT WITH FLOURS 1228 DATAWHY THE NEW IMMIGRANT STAYED AWAY FROM HIS HOUSE,HE WAS HOME SICK 1229 DATAWHAT TO SAY TO A CERTAIN GOLFER WHO HAS HIT HIS BALL INTO THE LAKE 1230 DATAPLAY IT AGAIN SAM 1231 DATAA NEAR SIGHTED MONSTER WITH GLASSES,HE DOES NOT LOOK SO GOOD 1232 DATAREQUISITE OF A GOOD POET,TO BE WELL VERSED 1233 DATAWHY THE RUNNER HAD TO BE REMINDED,TO JOG HIS MEMORY 1234 DATAHOW THE STUDENT ELECTRICIAN SPENT HIS EVENINGS,DOING HIS OHM WORK 1235 DATAMAKING A FUSS ABOUT WEARING CERTAIN PANTS,KNICKER BACKERS 1236 DATAHOW DID 2 SILK WORMS FINISH THE RACE,THEY ENDED IN A TIE 1237 DATAA STINGY CIRCUS HUMAN CANNONBALL,A CHEAP SHOT 1238 DATAWHY THE WORKER IN THE JUICE FACTORY WAS FIRED,HE DID NOT CONCENTRATE 1239 DATAWHAT IS GREEN AND HAPPY,A GLAD GARBAGE BAG 1240 DATACONVERSATIONS ON THE FIRST TELEPHONE,CRANK CALLS 1241 DATAWHERE THE DRUNK WAS IN SAN FRANCISCO,HIGH ON A HILL 1242 DATAINSTRUCTIONS TO A LONG DISTANCE SEAMSTRESS,SEW FAR SEW GOOD 1243 DATAWHY DOES A SPIDER SPIN A WEB,BECAUSE HE CAN NOT KNIT 1244 DATAA CONTAINER FOR CARRYING DIAMONDS,AN ICE BUCKET 1245 DATAA LOCOMOTIVE WITH AN IDEA,A TRAIN OF THOUGHT 1246 DATAWHAT HAPPENED TO THE HEN THAT ATE THE RACING FORM,SHE BEGAN LAYING ODDS 1247 DATAWHAT THE POKER PLAYER GETS WHEN HE APPLAUDS,A PAT HAND 1248 DATATHE CERTAIN FAT BIRD THAT CAUGHT ALL THE WORMS,ROUND ROBIN 1249 DATAWHAT SMILES DO FOR YOU,INCREASE THE FACE VALUE 1250 DATAA HOTEL OF POUNDS AND OUNCES,A WEIGH INN 1251 DATALARGE RELATIVE,BIG BROTHER 1252 DATAINDECISION,UNDER THE WHETHER 1253 DATAHOTEL ROOM FOR A TEENAGE GIRL,SWEET SIXTEEN 1254 DATAGETTING A CERTAIN NEWS PAPER OFF THE PRESS,LET THE GOOD TIMES ROLL 1255 DATAA SLEEPING BAG,A NAP SACK 1256 DATAWHAT THE CATTLEMEN HAD,A BULL SESSION 1257 DATANOT A VERY GOOD GAME,BADMINTON 1258 DATAWHY SWEDEN DOESN'T IMPORT CATTLE,IT HAS STOCK HOME 1259 DATAHAVING A PARTY ABOARD SHIP,ROCKING THE BOAT 1260 DATAA SHARKS FAVORITE BREAKFAST CEREAL,CAPTAIN CRUNCH 1261 DATAA WESTERN JUNGLE CLUB,THE ALBERTA TAR ZANS 1262 DATAWHAT A CHILDS SECRET TUNNEL IS,A HOLE LOT OF FUN 1263 DATADUSTING THE BED ONCE A YEAR,SPRING CLEANING 1264 DATAWHAT A NONTALKATIVE TRAVELER DOES,GOES WITHOUT SAYING 1265 DATATELEPHONING THE DRAPERY DEPARTMENT,MAKING A CURTAIN CALL 1266 DATAWHAT SAILORS IN A MINE ARE CALLED,MINERAL SALTS 1267 DATAORIENTAL CHIMNEY,ASIAN FLEU 1268 DATAWHAT A CERTAIN TV HOST IS USUALLY IN,THE THICKE OF THINGS 1269 DATAWHY HOMES OF THE WEALTHY ARE SO TIDY,THEY HAVE IT MAID 1270 DATAWHAT A PODIATRIST DOES,CHARGES BY THE FOOT 1271 DATAA SATANICAL ACTOR,DEVILLED HAM 1272 DATAWHAT A CERTAIN CIRCUS STAR SHOULDN'T BE,A TIGHT ROPE WALKER 1273 DATATHE GOOD EXCUSE SIR LANCELOT HAD FOR KEEPING THE PEACE,AN IRON CLAD ALIBI 1274 DATAWHY THE DETECTIVE THOUGHT SO MUCH OF HIMSELF,HE WAS A PRIVATE I 1275 DATAASTRONAUTS KEEPING THE PEACE ON LONG MISSIONS,SHUTTLE DIPLOMACY 1276 DATADRIVING SCHOOL IN LOUISIANNA,TWO LANE UNIVERSITY 1277 DATAA MEXICAN REACTION TO INFLATION,MUST WE PESO MUCH 1278 DATAWHAT SAILORS DRINK IN HARBOUR,PORT WINE 1279 DATAA VERY GOOD MAGICIAN,A SUPER DUPER 1280 DATASIGN IN A DOUGHNUT SHOP WINDOW,OUR BUSINESS IS HOLE SALE 1281 DATATWO BIT TRIM,QUARTER ROUND 1282 DATADISPLAY FOR SPECTACLES,GLASS CASE 1283 DATAWHAT THE FRESHLY CAUGHT FISH WAS,UP THE CREEK 1284 DATAWHY AN INUIT DOESN'T KISS,HE NOSE BETTER 1285 DATAWHERE THEY TAKE CERTAIN SICK ARMY OFFICERS,GENERAL HOSPITAL 1286 DATAHOW LONG THE BULL STAYED IN THE PASTURE,FOR HEIFER AND HEIFER 1287 DATAWHAT YOU NEED TO GET THE SCENT OF A CERTAIN ANIMAL,A NOSE FOR GNUS 1288 DATAA PAIR OF CROWNS,A ROYAL COUPLE 1289 DATAWHAT THE OBEDIENT BELL DID,RANG WHEN IT WAS TOLLED 1290 DATAMATERIAL FOR A BIG MAN'S SUIT,BROAD CLOTH 1291 DATAWHAT SOME THOUGHT EDGAR ALLEN POE TO BE,A RAVEN MANIAC 1292 DATAIF YOU CAN AFFORD AN EXPENSIVE GRASS CUTTER,MOWER POWER TO YOU 1293 DATAHOW CARPENTERS ARE PAID,WITH SAW BUCKS 1294 DATAAN EVANGELIST BROADCASTER,A TV CONVERTER 1295 DATATHE TV EXECUTIVE DIDN'T UNDERSTAND THIS,WHAT MAKES THE NET WORK 1296 DATAWHAT SIAMESE PEOPLE HAVE,A STRONG FAMILY THAI 1297 DATAWHAT SUNTAN LOTION IS,A BARE NECESSITY 1298 DATAHOW TO TELL HOW OLD A PALM TREE IS,BY THE DATES 1299 DATAWHY THE HUNTER WAS ANGRY WITH HIS DOG,HE HAD TO POINT HER 1300 DATAWHAT THE POTTER HAD,A HIGH URNING POWER 1301 DATATHE DENTISTS ADVISE,BRACE YOURSELF 1302 DATAWHERE THE WEDDING PROCESSION AT THE DUDE RANCH WENT,DOWN THE BRIDAL PATH 1303 DATAAN UNPROTECTED TORONTO HOCKEY PLAYER,A LOOSE LEAF 1304 DATAFORESTRY,A BRANCH OF SCIENCE 1305 DATAWHAT HAPPENED TO JILL WHEN JACK FELL DOWN,SHE TURNED PAIL 1306 DATAHOW A MAN PAID FOR HIS NEW SHIRT AND PANTS,OFF THE CUFF 1307 DATAWHAT ALL THE PRISON ORCHESTRA MEMBERS WANTED,THE LUTE 1308 DATAWHY THE ELECTRICAL COMPANY SPONSORED THE TV SHOW,TO GET THEIR PLUG IN 1309 DATATAKING THE ROAD ON YOUR WAY HOME,HIGHWAY ROBBERY 1310 DATAEOF,EOF 2000 IFK=CTTHENPRINT" NOBODY WILL GET ANY POINTS":FORT=1TO3500:NEXT:RETURN 2010 IFJ$=P1$THENJ1%=J1%+50:GOTO2050 2020 J2%=J2%+50 2050 PRINT"[147][144]"TAB(9)" D E F I N I T I O N [146]" 2060 PRINT" ";J$;",YOU WILL GET 50 POINTS." 2070 PRINTTAB(12)"THE NEW SCORE IS" 2080 PRINT""TAB((40-LEN(P1$)-10)/2)P1$;J1%;" POINTS" 2090 PRINT""TAB((40-LEN(P2$)-10)/2)P2$;J2%;" POINTS" 2100 PRINT"";J$;" YOU WILL GET A BONUS QUESTION." 2110 PRINT"THE BONUS QUESTION IS WORTH 260 POINTS" 2120 PRINT"LESS 10 POINTS FOR EACH LETTER GIVEN UP." 2130 PRINT" PRESS *F1* IF YOU KNOW THE ANSWER" 2140 PRINTTAB(9)"PRESS *C* TO CONTINUE":POKE198,0 2150 GETK$:IFK$<>"C"THEN2150 2160 GOSUB800:FORT=1TO4500:NEXT 2165 PRINT"[147][144]"TAB(9)" D E F I N I T I O N [146]" 2170 PRINT"";J$;" WILL GET"SC" BONUS-POINTS." 2171 IFJ$=P1$THENJ1%=J1%+SC:GOTO2175 2172 J2%=J2%+SC 2175 PRINTTAB(12)"THE NEW SCORE IS" 2180 PRINT""TAB((40-LEN(P1$)-10)/2)P1$;J1%;" POINTS" 2185 PRINT""TAB((40-LEN(P2$)-10)/2)P2$;J2%;" POINTS":FORTJ=1TO5000:NEXT 2200 K%=K%-1:RETURN 3000 PRINT"[147][144]"TAB(9)" [196] [197][160][198][160][201][160][206][160][201][160][212][160][201][160][207][160][206][160][146]" 3010 POKE53272,23:PRINT"[212]HIS GAME WAS CREATED BY: " 3020 PRINT"  [203][213][210][212] [211][195][200][210][197][201][206][197][210],[204][197][196][213][195] [193][204][194][197][210][212][193] " 3030 PRINT" ON MARCH 1983 AND IS BASED ON THE [212][214] SHOW [196][197][198][201][206][201][212][201][207][206] AND IS PLAYED "; 3040 PRINT"THE SAME." 3050 PRINT" [217]OU WILL BE ASKED TO GIVE A LETTER AWAY AND TO TAKE A LETTER." 3060 PRINT" [201]F YOU HAVE DONE SO CORRECTLY YOU WILL HAVE A CHANCE TO GUESS." 3070 PRINT" [215]ATCH YOUR TIME AS YOU HAVE ONLY 10SEC. TO GIVE OR TAKE A LETTER AND "; 3080 PRINT"45SEC.TO GUESS THE WORD OR PHRASE." 3090 PRINT" [197]ACH CORRECT ANSWER IS WORTH 50 POINTS AND A CHANCE TO PLAY FOR BONUS "; 3100 PRINT"POINTS. [201]NSTRUCTIONS WILL COME LATER." 3110 PRINT" [201] HOPE YOU HAVE FUN." 3200 PRINTTAB(9)"PRESS *C* TO CONTINUE":POKE198,0 3300 GETK$:IFK$<>"C"THEN3300 3400 POKE53272,21:RETURN 3900 L=LEN(A$(N,1)):IFL<=32THEN4000 3910 FORT=32TO1STEP-1:IFMID$(A$(N,1),T,1)=" "THENT=T-1:GOTO3950 3920 NEXT 3950 PRINT"[149]  HINT [146][144] ";LEFT$(A$(N,1),T):PRINTRIGHT$(A$(N,1),L-T):GOTO4100 4000 PRINT"[149]  HINT [146][144] ";A$(N,1) 4100 PRINT"";N;A$(N,2) 4150 PRINTTAB(9)"PRESS *C* TO CONTINUE":POKE198,0 4200 GETK$:IFK$<>"C"THEN4200 4300 N=N+1:GOTO3900 6010 L=LEN(A$(N,1)):IFL<=32THENT=1:RETURN 6020 FORT=32TO1STEP-1:IFMID$(A$(N,1),T,1)=" "THENT=T-1:GOTO6030 6025 NEXT 6030 PRINT"[149]  HINT [146][144] ";LEFT$(A$(N,1),T):PRINTRIGHT$(A$(N,1),L-T):RETURN